home *** CD-ROM | disk | FTP | other *** search
/ Experimental BBS Explossion 3 / Experimental BBS Explossion III.iso / comunic / boyan51a.zip / NITE.BSC < prev    next >
Text File  |  1993-11-15  |  6KB  |  127 lines
  1. \\
  2. \\  Nite.bsc by: Lee Breeden
  3. \\
  4. \\  This is an example of a script that is used to call systems at a
  5. \\  specified time and date.
  6. \\  The log file is set by todays date. "%B:log\%MO%DA.log"
  7. \\
  8. |Logon
  9. \ZS
  10. \\
  11. \\  This is where the script is called to set the time to start calling
  12. \\  the remote systems listed below.
  13. \\
  14. \PU[3:55]  \\ Wait till specified time
  15. |start
  16. \nd[%B:]\pa[2]
  17. \AF%B:dsz.log[      «══════════════ Logged on %MO/%DA  %HR:%Mi ═════════════»  ]
  18. \AF%B:boyan.use[      «══════════════ Logged on %MO/%DA  %HR:%Mi ═════════════»  ]
  19. \\
  20. \\
  21. \\  The next part will make it so that we are only keeping 5 log files on
  22. \\  the system.
  23. \\
  24. \\ the commands below will keep five days of old log files. Things will be
  25. \\ slightly different at the end of the month because of the difference in
  26. \\ the days of the month.
  27. \\
  28. \sv0[%B:log\]\sv1[%da]\sv2[%MO]
  29. \iv1+01[\+v1[26]\ie-%V2,01[\+v2[-1]|\+v2[12]]\dc-[del %v00%v2%v1.log]]
  30. \iv1+02[\+v1[26]\ie-%v2,01[\+v2[-1]|\+v2[12]]\dc-[del %v00%v2%v1.log]]
  31. \iv1+03[\+v1[26]\ie-%v2,01[\+v2[-1]|\+v2[12]]\dc-[del %v00%v2%v1.log]]
  32. \iv1+04[\+v1[26]\ie-%v2,01[\+v2[-1]|\+v2[12]]\dc-[del %v00%v2%v1.log]]
  33. \iv1+05[\+v1[26]\ie-%v2,01[\+v2[-1]|\+v2[12]]\dc-[del %v00%v2%v1.log]]
  34. \iv1+06[\+v1[26]\ie-%v2,01[\+v2[-1]|\+v2[12]]\dc-[del %v0%v2%v1.log]]
  35. \iv1+06[\+v1[-5]\ie-%v2,01[\+v2[-0]|\+v2[12]]\dc-[del %v0%v2`29.log]]
  36. \iv1+06[\+v1[-5]\ie-%v2,01[\+v2[-1]|\+v2[12]]\dc-[del %v0%v2`29.log]]
  37. \iv1+06[\+v1[-5]\ie-%v2,01[\+v2[-1]|\+v2[12]]\dc-[del %v0%v2`30.log]]
  38. \iv1+06[\+v1[-5]\ie-%v2,01[\+v2[-1]|\+v2[12]]\dc-[del %v0%v2`*.log]]
  39. \iv1+06[\+v1[-5]\dc-[del %v0%v20%v1.log]]
  40. \iv1+07[\+v1[-5]\dc-[del %v0%v20%v1.log]]
  41. \iv1+08[\+v1[-5]\dc-[del %v0%v20%v1.log]]
  42. \iv1+09[\+v1[-5]\dc-[del %v0%v20%v1.log]]
  43. \iv1+10[\+v1[-5]\dc-[del %v0%v20%v1.log]]
  44. \iv1+11[\+v1[-5]\dc-[del %v0%v20%v1.log]]
  45. \iv1+12[\+v1[-5]\dc-[del %v0%v20%v1.log]]
  46. \iv1+13[\+v1[-5]\dc-[del %v0%v20%v1.log]]
  47. \iv1+14[\+v1[-5]\dc-[del %v0%v20%v1.log]]
  48. \iv1+15[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  49. \iv1+16[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  50. \iv1+17[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  51. \iv1+18[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  52. \iv1+19[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  53. \iv1+20[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  54. \iv1+21[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  55. \iv1+22[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  56. \iv1+23[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  57. \iv1+24[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  58. \iv1+25[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  59. \iv1+26[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  60. \iv1+27[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  61. \iv1+28[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  62. \iv1+29[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  63. \iv1+30[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  64. \iv1+31[\+v1[-5]\dc-[del %v0%v2%v1.log]]
  65. \II+07,%Da[\dc-[ren %S:newfile.lst file%v27.new]]   \\ Change filename of newfiles log
  66. \II+14,%Da[\dc-[ren %S:newfile.lst file%v214.new]]  \\ Change filename of newfiles log
  67. \II+21,%Da[\dc-[ren %S:newfile.lst file%v221.new]]  \\ Change filename of newfiles log
  68. \II+28,%Da[\dc-[ren %S:newfile.lst file%v228.new]]  \\ Change filename of newfiles log
  69. \II+01,%Da[\dc-[ren %B:dsz.log dsz%v2.log]]       \\ Change filename of dsz log
  70. \II+01,%Da[\dc-[ren %B:files.new files%v2.new]]   \\ Change filename of newfiles log
  71. \II+01,%Da[\dc-[ren %B:dnfiles.lst files%v2.lst]] \\ Change filename of dnfiles log
  72. \II+01,%Da[\dc-[ren %B:boyan.use boyan%v2.use]]   \\ Change file of boyan.use log
  73. \II+01,%Da[\dc-[ren %S:newfile.lst newfil%V2.lst]]\\ Change file of new files list
  74. \\
  75. \\  The first thing that this does, is to make a log file that is assumed to
  76. \\  be located off of the boyan directory in a directory called  boyan\log
  77. \\
  78. \IE-%LN,%B:log\%MO%DA.log[\LD+[%B:log\%MO%DA.log]\LD-]
  79. \fe+%S:newfiles.lst[\dc-[type %s:newfiles.lst >> %s:newfile.lst]
  80. \fe+%S:newfiles.lst[\dc-[del %s:newfiles.lst]
  81. \\
  82. \\  Appends todays date to the log file for reference.
  83. \AF%LN[                                                                  ]
  84. \AF%LN[      «═════════ Log started on %MO/%DA at %HR:%Mi ════════════»  ]
  85. \AF%LN[                                                                  ]
  86. \IE+ON,%LD[\LD-]
  87. \\
  88. \\  ReSets modem for the start of the calling session and then runs init
  89. \\  string.
  90. \\
  91. ATZ~{~~
  92. \MA[9]
  93. \\wf[OK]AT&A3&B1&C1&D2&H1&R2&M4&N0&K3M0{
  94. \\wf[OK]
  95. \bb-
  96. \AV[0]          \\ alarm off
  97. \KO[0]          \\ keyboard time out TO to 0
  98. \\
  99. \\  I would recomend that you use a nite phone directory, so that any
  100. \\ modifications to your normal one won't effect the nitely calling numbers.
  101. \\
  102. \fd[nite.fon]  \\ ******** insert name of phone directory ********
  103. \QC             \\ clear queue [insert numbers from directory to call[?]]
  104. \\
  105. \\  Adds the following numbers to the dialing queue.
  106. \\
  107. \QA[6]                 \\ 6 NetEast   (Howard Hartman)
  108. \QA[2]                 \\ 1 Running Board (Bonnie Anthony)         229-5342
  109. \qa[1]                 \\ 2 Running Board (Bonnie Anthony)         229-5623
  110. \qa[19]                \\ 19 Eds Home of Columbia MD 9600    1-301-730-????
  111. \qa[17]                \\ 17 Eds Home of Columbia MD 9600    1-301-854-3076
  112. \\
  113. \\  The systems listed below are examples of systems that are being called
  114. \\  by date.  The \II+ command says if %DA day (01-31) is included in the
  115. \\  the following numbers (in this case dates) call this system.
  116. \\
  117. \\ 18,22,29
  118. \\II+%DA,05,12,19,26[\QA[11]]            \\ 11 Thumper's Den             1-918-355-3113
  119. \\II+%DA,01,05,09,13,17,21,25,29[\QA[5]]  \\ 5 The Science Lab BBS        1-301-466-0949
  120.  
  121. \\ Below, systems are not called nitely but have file functions U/L, D/L of
  122. \\ files that you just can not wait to do.  These systems will be called if
  123. \\ *.dow or *.up file exist.
  124.  
  125. \FE+%S:inter.up[\qa[Interconnect]]
  126. \FE+%S:ccmail.up[\qa[15]]
  127.